use "compiler.sml";

case CommandLine.arguments() of
	(input :: output:: rest) =>
			(CodeGen.compileSchemeFile(input, output) handle Io => OS.Process.exit(OS.Process.failure);
			OS.Process.exit(OS.Process.success))
	| _ => OS.Process.exit(OS.Process.failure)
